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Steven M. Hoffberg 

From: Steven M. Hoffberg [steve@hoffberg.org] 
Sent: Thursday, November 18, 2004 12:20 PM 
To: 'Nguyen, Nga' 
Subject: 09/599,163 profile.c 

/* 



* Helper functions for user profile data structure 

* (c) Copyright 1995 Newshare Corporation 



7 

#define PROFILEJMPLEMENTATION /* needs to be at top 7 

#include <stdio.h> 
#include <stdlib.h> 
#include <unistd.h> 
#include <bstring.h> 
#include <sys/time.h> 
#include <sys/types.h> 
#include <netinet/in.h> 
#ifdef SOLARIS2 

#define bcopy(b1,b2,len) memnnove(b2, b1, (size_t)(len)) 
#define bzero(bjen) memset(b, 0, (size_t)(len)) 
#define bcmp(b1,b2,len) memcnnp(b1 , b2, (size_t)(len)) 
#endif/* SOLARIS2 7 

#include "coding. h" 

#define PUBLIC 
#define PRIVATE static 
#define MALLOC(c) malloc(c) 

/* User Profile Data Structures 7 

/* the service class 7 

struct service_class { 
unsigned int class_id: 4; /* class identification 7 

unsigned int pgnjimit: 4; /* page count delivery limit 7 

unsigned int priority: 4; /* service priority 7 

unsigned int pgcljimit: 2; /* corresponds to FLAG bits in page-class 7 
unsigned int unusedl : 2; 
unsigned int unused2: 16; 

}; 
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/* encoded user preferences 7 



struct user_preferences { 
/* "sensitivity" flags 7 

unsigned int pdac_flag: 1 ; /* parent discretion / adult content limit 7 



unsigned int privacy1_flag: 1; 
unsigned int prem_chg_flag: 
unsigned int unusedf4: 1 ; 
unsigned int unusedf5: 1 ; 
unsigned int unusedf6: 1 ; 
unsigned int adv_ctxt: 2; 



/* yes/no corrolate user to use 7 
1 ; /* do not notify for hi-cost pages 7 



/* advertising context 7 



/* additional preferences 7 

unsigned int cust_grp: 4; /* customer group 7 

unsigned int unused7: 4; 
unsigned int unused8: 16; 

}; 



/* profile of a user 7 

/* NOTE: all (unsigned long) in net byte order, hjd stays that way 7 



struct user_profile { 
unsigned long h_id; 
unsigned long u_id; 
unsigned long pjd 
unsigned long ses_id; 
struct service_class sc; 
struct user_preferences up; 

}; 



/* IP address of current host 7 
/* global newshare user identifier 7 

/* global ID of this user's PM 7 
/* session ID of the current session 7 



typedef struct user_profile *TVS_PROFILE; 



/* 



* legitimate way to treat the profile as bytes :-) 

7 



union up_byt.es { 

struct user_profile up; 

char upc[sizeof(struct user_profile)]; 

int u pi [(sizeof (struct user_profile) / sizeof(unsigned long))]; 

}; 

/* magic padding bytes 7 

#define MAGIC_UP_PAD OxOfOfO 
#define MAGIC_SC_PAD OxOfOfO 

#include "tvs_profile.h" 
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/* 

* exported functions to get info in/out of the profile 



7 

PUBLIC int 

tvs_profile_is_valid(TVS_PROFILE prof) 
{ 

if ((prof->up.unused8 == MAGIC_UP_PAD) && (prof->sc.unused2 == MAGIC_SC_PAD)) 
return 1 ; 
else 

return 0; 

} 

PUBLIC int 

tvs_sizeof_profile() 

{ 

return sizeof(struct user_profile); 

} 

PUBLIC TVS_PROFILE 
tvs_make_user_profile() 
{ 

TVS_PROFILE prof; 

prof = (TVS_PROFILE) MALLOC(sizeof(struct user_profile)); 
if (Iprof) return (TVS_PROFILE) NULL; 

bzero((char *)prof, sizeof(struct user_profile)); 
prof->up.unused8 = MAGIC_UP_PAD; 
prof->sc.unused2 = MAGIC_SC_PAD; 

/* setup default values 7 

tvs_set_service_class(prof, DEFAULT SERVICE CLASS); 
tvs_set_page_class_limit(prof, D E FAU LT_PAG E_C LASS_L I MIT); 
tvs_set_service_priority(prof, DEFAULT SERVICE PRIORITY); 
tvs_set_customer_group(prof, DEFAULT CUSTOMER GROUP); 
tvs_set_adv_context(prof, DEFAULT_ADV_LEVEL); 
tvs_set_pdac_flag(prof, DEFAULT_PDAC_FLAG); 
tvs_set_privacy1_flag(prof, DEFAULT PRIVACY FLAG); 
tvs_set_premium_flag(prof, DEFAULT_PREMIUM_FLAG); 

return prof; 

} 



PUBLIC TVS_PROFILE 

tvs_make_testdrive_profile() 

{ 
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TVS_PROFILE prof; 

prof = (TVS_PROFILE) MALLOC(sizeof(struct user_profile)); 
if (!prof) return (TVS_PROFILE) NULL; 

bzero((char *)prof, sizeof(struct user_profile)); 
prof->up.unused8 = MAGIC_UP_PAD; 
prof->sc.unused2 = MAGIC_SC_PAD; 

/* set special testdrive values 7 

tvs_set_service_class(prof, TESTDRIVE_SERVICE_CLASS); 
tvs_set_page_class_limit(prof, TESTDRIVE_PAGE_CLASS_LIMIT); 
tvs_set_service_priority(prof, TESTDRIVE_SERVICE_PRIORITY); 
tvs_set_customer_group(prof, TESTDRIVE_CUSTOMER_GROUP); 
tvs_set_adv_context(prof, TESTDRIVE_ADV_LEVEL); 
tvs_set_pdac_flag(prof, TESTDRIVE PDAC FLAG); 
tvs_set_privacy1_flag(prof, TESTDRIVE PRIVACY FLAG); 
tvs_set_premium_flag(prof, TESTDRIVE_PREMIUM_FLAG); 

return prof; 

} 

PUBLIC void 

tvs_set_userid(TVS_PROFILE prof, unsigned long uid) 
{ 

if (prof) 

prof->u_id = uid; 



PUBLIC void 

tvs_set_pmid(TVS_PROFILE prof, unsigned long pmid) 
{ 

if (prof) 

prof->p_id = pmid; 

} 

PUBLIC void 

tvs_set_hostid(TVS_PROFILE prof, unsigned long hostid) 
{ 

if (prof) 

prof->h_id = hostid; /* already in net byte order from gethostbyname() 7 

} 

#if 0 

PUBLIC unsigned long 

tvs_make_sessionid(unsigned long pm_id, unsigned long id) 
{ 

unsigned long sid; 
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sid = ((pm_id & Oxffff) « 16) + (id & Oxffff); 
return sid; 

} 

#else 

PUBLIC unsigned long 

tvs_make_sessionid(unsigned long pm_id, unsigned long id) 
{ 

struct timeval tv; 
unsigned int tmp; 

#define BIT_MSK Oxff 
#define UNBIT MSK 8 

if (gettimeofday(&tv, NULL) == 0) { 

tmp = (tv.tv_sec « UNBIT_MSK) | ((tv.tv_usec » 4) & BIT_MSK); 
return tmp; 

} 

return 0x11223344; 

} 

#endif 

PUBLIC void 

tvs_set_sessionid(TVS_PROFILE prof, unsigned long sid) 
{ 

if (prof) 

prof->ses_id = sid; 

} 

PUBLIC void 

tvs_set_service_class(TVS_PROFILE prof, int class) 
{ 

if (prof) 

prof->sc.class_id = class; 

} 

PUBLIC void 

tvs_set_page_class_limit(TVS_PROFILE prof, int limit) 
{ 

if (prof) 

prof->sc.pgcl_limit = limit; 

} 

PUBLIC void 

tvs_set_page_count_limit(TVS_PROFILE prof, int count) 
{ 

if (prof) 

prof->sc.pgn_limit = count; 

} 

PUBLIC void 

tvs_set_service_priority(TVS_PROFILE prof, int priority) 
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if (prof) 

prof->sc. priority = priority; 

} 

PUBLIC void 

tvs_set_customer_group(TVS_PROFILE prof, int group) 
{ 

if (prof) 

prof->up.cust_grp = group; 

} 

PUBLIC void 

tvs_set_adv_context(TVS_PROFILE prof, int ac) 
{ 

if (prof) 

prof->up.adv_ctxt = ac; 

} 

PUBLIC void 

tvs_set_pdac_flag(TVS_PROFILE prof, int flag) 
{ 

if (prof) 

prof->up.pdac_flag = flag; 

} 

PUBLIC void 

tvs_set_privacy1_flag(TVS_PROFILE prof, int flag) 
{ 

if (prof) 

prof->up.privacy1_flag = flag; 

} 

PUBLIC void 

tvs_set_premium_flag(TVS_PROFILE prof, int flag) 
{ 

if (prof) 

prof->up.prem_chg_flag = flag; 

} 

PUBLIC unsigned long 
tvs_get_userid(TVS_PROFILE prof) 
{ 

return prof->u_id; 

} 

PUBLIC unsigned long 
tvs_get_pmid(TVS_PROFILE prof) 
{ 

return prof->p_id; 

} 
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PUBLIC unsigned long 
tvs_get_hostid(TVS_PROFILE prof) 

return prof->h_id; /* leave in net byte order 7 



PUBLIC unsigned long 
tvs_get_sessionid(TVS_PROFILE prof) 

return prof->ses_id; 



PUBLIC int 

tvs_get_service_class(TVS_PROFILE prof) 
return (int) prof->sc.class_id; 



PUBLIC int 

tvs_get_page_class_limit(TVS_PROFILE prof) 
return (int) prof->sc.pgcl_limit; 



PUBLIC int 

tvs_get_page_count_limit(TVS_PROFILE prof) 
return (int) prof->sc.pgn_limit; 



PUBLIC int 

tvs_get_service_priority(TVS_PROFILE prof) 
return (int) prof->sc. priority; 



PUBLIC int 

tvs_get_customer_group(TVS_PROFILE prof) 
return (int) prof->up.cust_grp; 



PUBLIC int 

tvs_get_adv_context(TVS_PROFILE prof) 
return (int) prof->up.adv_ctxt; 



PUBLIC int 

tvs_get_pdac_flag(TVS_PROFILE prof) 
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return (int) prof->up.pdac_flag; 

} 

PUBLIC int 

tvs_g et_p ri vacy 1 _f I ag (TVS_P RO F I L E p rof ) 
{ 

return (int) prof->up.privacy1_flag; 

} 

PUBLIC int 

tvs_get_premium_flag(TVS_PROFILE prof) 
{ 

return (int) prof->up.prem_chg_flag; 

} 

#if 0 

/* 

* encode a TVS_PROFILE for transmission over the net 

* REPLACED BELOW!!!!! 



7 

PUBLIC char* 

tvs_encode_profile(TVS_PROFILE prof) 
{ 

char *string; 

int len = 128, plen, i; 

union up_byt.es *up = (union up_byt.es *)prof; 

/* net compatible byte swap 7 

plen = tvs_sizeof_profile(); 
for (i = 0; i < (plen / sizeof(unsigned long)); i++) 
up->upi[i] = htonl(up->upi[i]); 

string = (char *) MALLOC(len); 
if (Istring) return (char *) NULL; 

if (!tvs_encode((char *) prof, tvs_sizeof_profile(), string, &len)) 
return (char *) NULL; 
else { 
string[len] = '\0'; 

string = realloc(string, strlen(string)+1); 
return (char *)string; 

} 

} 

/* 

* decode an encoded TVS_PROFILE 



11/28/2006 



Page 9 of 13 



7 

PUBLIC TVS_PROFILE 
tvs_decode_profile(char *string) 
{ 

int len, i; 

TVS_PROFILE up; 
union up_bytes *ub; 

len = tvs_sizeof_profile(); 
up = tvs_make_user_profile(); 
ub = (union up_bytes *) up; 

if (!tvs_decode(string, (char *) up, &len)) 
return (TVS_PROFILE) NULL; 
else { /* net compatible byte swap 7 

len = tvs_sizeof_profile(); 

for (i = 0; i < (len / sizeof(un signed long)); i++) 

ub->upi[i] = ntohl(ub->upi[i]); 

return up; 

} 

} 

#endif 

/* 

* show contents of a profile 



7 

PUBLIC void 

tvs_show_user_profile(TVS_PROFILE prof) 
{ 

if (Iprof) return; 

printf("profile:\nhost id:\tOx%lx\nuser id:\t0x%lx\n", 
tvs_get_hostid(prof), tvs_get_userid(prof)); 

printf("pm id:\t\tOx%lx\n", tvs_get_pmid(prof)); 

printf("session:\tOx%lx\n", tvs_get_sessionid(prof)); 

printf("service class:\tOx%x\n", tvs_get_service_class(prof)); 
printf("page cnt Iimit:\t0x%x\n", tvs_get_page_count_limit(prof)); 
printf("serv pr:\t0x%x\n", tvs_get_service_priority(prof)); 
printf("page class Iim:\t0x%x\n", tvs_get_page_class_limit(prof)); 

printf("pdac flag:\tOx%x\n", tvs_get_pdac_flag(prof)); 
printf("privacy1 :\t0x%x\n", tvs_get_privacy1_flag(prof)); 
printf("prem chg:\t0x%x\n", tvs_get_premium_flag(prof)); 

printf("adv ctx:\tOx%x\nc group:\tOx%x\n", 
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tvs_get_adv_context(prof), tvs_get_customer_group(prof)); 
return; 

} 

/* 

* make the flag chars that go into the log file 



7 

PUBLIC char* 

tvs_make_preference_flags(TVS_PROFILE prof) 
{ 

static charflags[11]; 
unsigned int fbits = 0; 

memcpy(&fbits, &(prof->up), 4); 

sprintf(flags,"0x%08x", fbits); 
return flags; 

} 

/* 

* endian neutral, quick bit field coding for the profile 



7 

static int hexcodes[16] = 

{0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x61,0x62,0x63,0x64,0x65,0x66}; 
PUBLIC char* 

tvs_encode_profile(TVS_PROFILE prof) 
{ 

char *buffer; 
int i = 0, j = 0; 

buffer = (char *) malloc(1 28); 
if (Ibuffer) return (char*) NULL; 

sprintf(buffer, "%08lx", ntohl(prof->h_id)); 
sprintf(&buffer[i+=8], "%08lx", prof->u_id); 
sprintf(&buffer[i+=8], "%08lx", prof->p_id); 
sprintf(&buffer[i+=8], "%08lx", prof->ses_id); 

/* service class 7 
i+=8; 

buffer[i++] = hexcodes[prof->sc.class_id & Oxf]; 
buffer[i++] = hexcodes[prof->sc.pgn_limit & Oxf]; 
buffer[i++] = hexcodes[prof->sc. priority & Oxf]; 
j = ((prof->sc.pgcl_limit & 0x3) « 2) + prof->sc.unused1 ; 
buffer[i++] = hexcodes[j]; 

buffer[i++] = hexcodes[(prof->sc.unused2 » 12) & Oxf]; 
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buffer[i++] = hexcodes[(prof->sc.unused2 » 8) & Oxf]; 
buffer[i++] = hexcodes[(prof->sc.unused2 » 4) & Oxf]; 
buffer[i++] = hexcodes[(prof->sc.unused2 & Oxf)]; 

/* user preferences 7 

j |= prof->up.pdac_flag; 
j = (j « 1) | (prof->up.privacy1_flag); 
j = (j « 1) j (prof->up.prem_chg_flag); 
j = (j « 1) j (prof->up.unusedf4 & 0x1); 

buffer[i++] = hexcodes[(j & Oxf)]; 
j = prof->up.unusedf5 & 0x1 ; 
j = (j « 1) | (prof->up.unusedf6); 
j = (j « 2) | (prof->up.adv_ctxt & 0x3); 

buffer[i++] = hexcodes[j]; 

buffer[i++] = hexcodes[(prof->up.cust_grp & Oxf)]; 

j = prof->up.unused7; 

buffer[i++] = hexcodes[(j & Oxf)]; 

j = prof->up.unused8; 

buffer[i++] = hexcodes[(j » 12) & Oxf]; 

buffer[i++] = hexcodes[(j » 8) & Oxf]; 

buffer[i++] = hexcodes[(j » 4) & Oxf]; 

buffer[i++] = hexcodes[(j & Oxf)]; 

bufferp] = '\0'; 
return buffer; 

} 

#define HEXVAL(c) ((c) > '9' ? (c) - 'a' + 10 : (c) - '0') 

PUBLIC TVS_PROFILE 
tvs_decode_profile(char *buffer) 
{ 

TVS_PROFILE prof; 
int i = 0; 

unsigned int k, I, m, n; 
unsigned long j; 

prof = tvs_make_user_profile(); 
if (Iprof) return prof; 

sscanf(buffer, "%8lx", &(prof->h_id)); 
prof->h_id = htonl(prof->h_id); 
sscanf(&buffer[i+=8], "%8lx", &(prof->u_id)); 
sscanf(&buffer[i+=8], "%8lx", &(prof->p_id)); 
sscanf(&buffer[i+=8], "%8lx", &(prof->ses_id)); 

/* service class 7 
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i+=8; 

prof->sc.class_id = HEXVAL(buffer[i]); i++; 
prof->sc.pgn_limit = HEXVAL(buffer[i]); i++; 
prof->sc. priority = HEXVAL(buffer[i]); i++; 

k = HEXVAL(buffer[i]); i++; 
prof->sc.pgclJimit = (k » 2) & 0x3; 
prof->sc. unused 1 = (k & 0x3); 

k = HEXVAL(buffer[i]); i++; 
I = HEXVAL(buffer[i]); i++; 
m = HEXVAL(buffer[i]); i++; 
n = HEXVAL(buffer[i]); i++; 

j = ((k&0xf)«12)| 
((I & Oxf) « 8) | 
((m & Oxf) « 4) | 
(n & Oxf); 

prof->sc.unused2 = j & Oxffff; 

/* user preferences 7 

n = HEXVAL(buffer[i]); i++; 
prof->up.pdac_flag = (n » 3) & 0x1 ; 
prof->up. privacy! _flag = (n » 2) & 0x1; 
prof->up.prem_chg_flag = (n » 1) & 0x1; 
prof->up.unusedf4 = n & 0x1 ; 

n = HEXVAL(buffer[i]); i++; 

prof->up.unusedf5 = (n » 3) & 0x1 ; 
prof->up.unusedf6 = (n » 2) & 0x1 ; 
prof->up.adv_ctxt = n & 0x3; 

prof->up.cust_grp = HEXVAL(buffer[i]); i++; 

prof->up.unused7 = HEXVAL(buffer[i]); i++; 

k = HEXVAL(buffer[i]); i++; 
I = HEXVAL(buffer[i]); i++; 
m = HEXVAL(buffer[i]); i++; 
n = HEXVAL(buffer[i]); i++; 

prof->up.unused8 = ((k & Oxf) « 12) | ((I & Oxf) « 8) | ((m & Oxf) « 4) | (n & Oxf); 
return prof; 

} 
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Very truly yours, 

Steven M. Hoffberg 

Milde & Hoffberg, LLP 

Suite 460 

10 Bank Street 

White Plains, NY 10606 

(914) 949-3100 tel. 

(914) 949-3416 fax 

Confidentiality Notice: This message, and any attachments thereto, may contain confidential information which is 
legally privileged. The information is intended only for the use of the intended recipient, generally the individual or 
entity named above. If you believe you are not the intended recipient, or in the event that this document is 
received in error, or misdirected, you are requested to immediately inform the sender by reply e-mail at 
Steve@Hoffberg.org and destroy all copies of the e-mail file and attachments. You are hereby notified that any 
disclosure, copying, distribution or use of any information contained in this transmission other than by the 
intended recipient is strictly prohibited. 
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